home *** CD-ROM | disk | FTP | other *** search
/ Horoscope Companion: Gemini / Horoscope Companion: Gemini.iso / pc / gemini / contents.dir / 00005.ls < prev    next >
Encoding:
Text File  |  1996-10-08  |  275 b   |  17 lines
  1. on mouseDown
  2.   if hButtonAction01() then
  3.     mouseUp()
  4.   end if
  5. end
  6.  
  7. on mouseUp
  8.   global gSoundFadeOut, gWhichMovie
  9.   cursor(4)
  10.   hAddBookmark()
  11.   hCheckCurrentFrameLabel()
  12.   sound fadeOut 1, 1 * 60
  13.   set gSoundFadeOut to 1
  14.   set gWhichMovie to "QUIT.DIR"
  15.   startTimer()
  16. end
  17.